object DAMOGrau1: TDAMOGrau1
  OldCreateOrder = False
  OnCreate = DataModuleCreate
  OnDestroy = DataModuleDestroy
  Height = 357
  Width = 177
  object STPRPushServiceEmailMovimento: TStoredProc
    DatabaseName = 'database'
    StoredProcName = 'dbo.PushServiceEmailMovimento;1'
    Left = 72
    Top = 56
    ParamData = <
      item
        DataType = ftInteger
        Name = 'Result'
        ParamType = ptResult
        Value = 0
      end>
    object STPRPushServiceEmailMovimentoCodigoProcesso: TIntegerField
      FieldName = 'CodigoProcesso'
    end
    object STPRPushServiceEmailMovimentoDataMovimento: TDateTimeField
      FieldName = 'DataMovimento'
    end
    object STPRPushServiceEmailMovimentoSituacaoProcesso: TSmallintField
      FieldName = 'SituacaoProcesso'
    end
    object STPRPushServiceEmailMovimentoSegredoJustica: TStringField
      FieldName = 'SegredoJustica'
      FixedChar = True
      Size = 1
    end
    object STPRPushServiceEmailMovimentoCodigoRecipiente: TIntegerField
      FieldName = 'CodigoRecipiente'
    end
    object STPRPushServiceEmailMovimentoRecipiente: TStringField
      FieldName = 'Recipiente'
      FixedChar = True
      Size = 50
    end
    object STPRPushServiceEmailMovimentoStatusRecipiente: TStringField
      FieldName = 'StatusRecipiente'
      FixedChar = True
      Size = 1
    end
  end
  object DataBase: TDatabase
    DatabaseName = 'database'
    DriverName = 'SYBASE'
    LoginPrompt = False
    Params.Strings = (
      'DATABASE NAME=dbpgr01'
      'SERVER NAME=DESCGJPE_DS'
      'USER NAME=pushapp'
      'PASSWORD=******'
      'LANG DRIVER=SYDC850')
    SessionName = 'Default'
    Left = 72
    Top = 8
  end
  object STPRPushServiceTextoMovimento: TStoredProc
    DatabaseName = 'database'
    StoredProcName = 'dbo.PushServiceTextoMovimento;1'
    Left = 72
    Top = 104
    ParamData = <
      item
        DataType = ftInteger
        Name = 'Result'
        ParamType = ptResult
        Value = 0
      end
      item
        DataType = ftInteger
        Name = '@CodigoProcesso'
        ParamType = ptInput
      end
      item
        DataType = ftDateTime
        Name = '@DataMovimento'
        ParamType = ptInput
      end>
    object STPRPushServiceTextoMovimentoTexto: TMemoField
      FieldName = 'Texto'
      BlobType = ftMemo
    end
  end
  object STPRPushServiceMovimento: TStoredProc
    DatabaseName = 'database'
    StoredProcName = 'dbo.PushServiceMovimento;1'
    Left = 72
    Top = 152
    ParamData = <
      item
        DataType = ftInteger
        Name = 'Result'
        ParamType = ptResult
        Value = 0
      end
      item
        DataType = ftInteger
        Name = '@CodigoProcesso'
        ParamType = ptInput
      end
      item
        DataType = ftDateTime
        Name = '@DataMovimento'
        ParamType = ptInput
      end>
    object STPRPushServiceMovimentoCodigoProcesso: TIntegerField
      FieldName = 'CodigoProcesso'
    end
    object STPRPushServiceMovimentoDataMovimento: TDateTimeField
      FieldName = 'DataMovimento'
    end
    object STPRPushServiceMovimentoCodigoFase: TSmallintField
      FieldName = 'CodigoFase'
    end
    object STPRPushServiceMovimentoFase: TStringField
      FieldName = 'Fase'
      FixedChar = True
      Size = 50
    end
    object STPRPushServiceMovimentoCodigoComplemento: TSmallintField
      FieldName = 'CodigoComplemento'
    end
    object STPRPushServiceMovimentoComplemento: TStringField
      FieldName = 'Complemento'
      FixedChar = True
      Size = 200
    end
  end
  object STPRPushServiceMovimentoExc: TStoredProc
    DatabaseName = 'database'
    StoredProcName = 'dbo.PushServiceMovimentoExc;1'
    Left = 72
    Top = 200
    ParamData = <
      item
        DataType = ftInteger
        Name = 'Result'
        ParamType = ptResult
      end
      item
        DataType = ftInteger
        Name = '@CodigoProcesso'
        ParamType = ptInput
      end
      item
        DataType = ftDateTime
        Name = '@DataMovimento'
        ParamType = ptInput
      end>
    object STPRPushServiceMovimentoExcCodigoProcesso: TIntegerField
      FieldName = 'CodigoProcesso'
    end
    object STPRPushServiceMovimentoExcDataMovimento: TDateTimeField
      FieldName = 'DataMovimento'
    end
    object STPRPushServiceMovimentoExcCodigoFase: TSmallintField
      FieldName = 'CodigoFase'
    end
    object STPRPushServiceMovimentoExcFase: TStringField
      FieldName = 'Fase'
      FixedChar = True
      Size = 50
    end
    object STPRPushServiceMovimentoExcCodigoComplemento: TSmallintField
      FieldName = 'CodigoComplemento'
    end
    object STPRPushServiceMovimentoExcComplemento: TStringField
      FieldName = 'Complemento'
      FixedChar = True
      Size = 200
    end
  end
  object STPRPushServiceParteProcesso: TStoredProc
    DatabaseName = 'database'
    StoredProcName = 'dbo.PushServiceParteProcesso;1'
    Left = 72
    Top = 248
    ParamData = <
      item
        DataType = ftInteger
        Name = 'Result'
        ParamType = ptResult
        Value = 0
      end
      item
        DataType = ftInteger
        Name = '@CodigoProcesso'
        ParamType = ptInput
      end>
    object STPRPushServiceParteProcessoCodigoProcesso: TIntegerField
      FieldName = 'CodigoProcesso'
    end
    object STPRPushServiceParteProcessoCodigoTipoParte: TSmallintField
      FieldName = 'CodigoTipoParte'
    end
    object STPRPushServiceParteProcessoTipoParte: TStringField
      FieldName = 'TipoParte'
      FixedChar = True
      Size = 30
    end
    object STPRPushServiceParteProcessoNome: TStringField
      FieldName = 'Nome'
      FixedChar = True
      Size = 200
    end
  end
  object STPRPushServiceDadosProcesso: TStoredProc
    DatabaseName = 'database'
    StoredProcName = 'dbo.PushServiceDadosProcesso;1'
    Left = 72
    Top = 304
    ParamData = <
      item
        DataType = ftInteger
        Name = 'Result'
        ParamType = ptResult
        Value = 0
      end
      item
        DataType = ftInteger
        Name = '@CodigoProcesso'
        ParamType = ptInput
      end>
    object STPRPushServiceDadosProcessoCodigoProcesso: TIntegerField
      FieldName = 'CodigoProcesso'
    end
    object STPRPushServiceDadosProcessoNPU: TStringField
      FieldName = 'NPU'
      FixedChar = True
    end
    object STPRPushServiceDadosProcessoNumeroAntigo: TStringField
      FieldName = 'NumeroAntigo'
      FixedChar = True
      Size = 16
    end
    object STPRPushServiceDadosProcessoCodigoVara: TSmallintField
      FieldName = 'CodigoVara'
    end
    object STPRPushServiceDadosProcessoNomeVara: TStringField
      FieldName = 'NomeVara'
      FixedChar = True
      Size = 200
    end
    object STPRPushServiceDadosProcessoCodigoComarca: TSmallintField
      FieldName = 'CodigoComarca'
    end
    object STPRPushServiceDadosProcessoNomeComarca: TStringField
      FieldName = 'NomeComarca'
      FixedChar = True
      Size = 200
    end
    object STPRPushServiceDadosProcessoCodigoMagistrado: TIntegerField
      FieldName = 'CodigoMagistrado'
    end
    object STPRPushServiceDadosProcessoNomeMagistrado: TStringField
      FieldName = 'NomeMagistrado'
      FixedChar = True
      Size = 200
    end
    object STPRPushServiceDadosProcessoCodigoFeito: TSmallintField
      FieldName = 'CodigoFeito'
    end
    object STPRPushServiceDadosProcessoDescricaoFeito: TStringField
      FieldName = 'DescricaoFeito'
      FixedChar = True
      Size = 100
    end
    object STPRPushServiceDadosProcessoSegredoJustica: TStringField
      FieldName = 'SegredoJustica'
      FixedChar = True
      Size = 1
    end
  end
end
